Public Class SqlExpressdto
 Inherits KetNoiDto
 #Region "Attributes"
 Private _Duongdan As String
 #End Region
 #Region "Property"
 Public Property DuongdanSqlExpress() As String
 Get 
 Return _Duongdan 
 End Get 
 Set(ByVal value As String)
 _Duongdan = value
 End Set
 End Property
 #End Region
 #Region "Contructor"
 Public Sub New()
 DuongdanSqlExpress = ""
 MsSql = Class_KieuDL.sqlExpress
 End Sub
 Public Sub New(ByVal duongdan As String)
 MsSql = Class_KieuDL.sqlExpress
 ChuoiKetNoi = "Data Source=.\SQLEXPRESS;AttachDbFilename=" & duongdan & ";Integrated Security=True;User Instance=True"
 End Sub
 Public Sub ChuoiKetNoiSqlExpress()
 ChuoiKetNoi = "Data Source=.\SQLEXPRESS;AttachDbFilename=" & DuongdanSqlExpress & ";Integrated Security=True;User Instance=True"
 End Sub
 #End Region
 End Class
